home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / MacFormat 92 CD / Shareware Plus / Utilities / FolderSynchronizer 1.8.9 / FoldersSynchronizer / FoldersSynchronizer.9 / AllScripts_21_ScrChekBoxes.ls < prev    next >
Encoding:
Text File  |  2000-05-10  |  656 b   |  18 lines
  1. on beginSprite me
  2.   set mySprite to the spriteNum of me
  3.   set myMember to the member of sprite mySprite
  4.   if the type of myMember = #bitmap then
  5.     set myVariable to value(BtnName(the name of member the member of sprite (mySprite + 1)))
  6.     set the member of sprite mySprite to member ("BtnUpCHK" & string(myVariable))
  7.     updateStage()
  8.   end if
  9. end
  10.  
  11. on mouseDown me
  12.   set mySprite to the spriteNum of me
  13.   set myMember to the member of sprite mySprite
  14.   set delta to -1 * (the type of myMember = #field)
  15.   set myVariable to BtnName(the name of member the member of sprite (mySprite + delta + 1))
  16.   SetCheckBox(myVariable, mySprite + delta, mySprite)
  17. end
  18.